home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1994-06-22 | 2.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 72 6f 6c 61 6e 64 40 |piled by| roland@|
|00000020| 67 65 65 63 68 2e 67 6e | 75 2e 61 69 2e 6d 69 74 |geech.gn|u.ai.mit|
|00000030| 2e 65 64 75 20 6f 6e 20 | 57 65 64 20 4a 75 6e 20 |.edu on |Wed Jun |
|00000040| 32 32 20 32 31 3a 32 39 | 3a 35 30 20 31 39 39 34 |22 21:29|:50 1994|
|00000050| 0a 3b 3b 3b 20 66 72 6f | 6d 20 66 69 6c 65 20 2f |.;;; fro|m file /|
|00000060| 67 64 2f 67 6e 75 2f 65 | 6d 61 63 73 2f 31 39 2e |gd/gnu/e|macs/19.|
|00000070| 30 2f 6c 69 73 70 2f 73 | 2d 72 65 67 69 6f 6e 2e |0/lisp/s|-region.|
|00000080| 65 6c 0a 3b 3b 3b 20 65 | 6d 61 63 73 20 76 65 72 |el.;;; e|macs ver|
|00000090| 73 69 6f 6e 20 31 39 2e | 32 35 2e 31 32 2e 0a 3b |sion 19.|25.12..;|
|000000a0| 3b 3b 20 62 79 74 65 63 | 6f 6d 70 20 76 65 72 73 |;; bytec|omp vers|
|000000b0| 69 6f 6e 20 46 53 46 20 | 32 2e 31 30 0a 3b 3b 3b |ion FSF |2.10.;;;|
|000000c0| 20 6f 70 74 69 6d 69 7a | 61 74 69 6f 6e 20 69 73 | optimiz|ation is|
|000000d0| 20 6f 6e 2e 0a 3b 3b 3b | 20 74 68 69 73 20 66 69 | on..;;;| this fi|
|000000e0| 6c 65 20 75 73 65 73 20 | 6f 70 63 6f 64 65 73 20 |le uses |opcodes |
|000000f0| 77 68 69 63 68 20 64 6f | 20 6e 6f 74 20 65 78 69 |which do| not exi|
|00000100| 73 74 20 69 6e 20 45 6d | 61 63 73 20 31 38 2e 0a |st in Em|acs 18..|
|00000110| 0a 28 69 66 20 28 61 6e | 64 20 28 62 6f 75 6e 64 |.(if (an|d (bound|
|00000120| 70 20 27 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |p 'emacs|-version|
|00000130| 29 0a 09 20 28 6f 72 20 | 28 61 6e 64 20 28 62 6f |).. (or |(and (bo|
|00000140| 75 6e 64 70 20 27 65 70 | 6f 63 68 3a 3a 76 65 72 |undp 'ep|och::ver|
|00000150| 73 69 6f 6e 29 20 65 70 | 6f 63 68 3a 3a 76 65 72 |sion) ep|och::ver|
|00000160| 73 69 6f 6e 29 0a 09 20 | 20 20 20 20 28 73 74 72 |sion).. | (str|
|00000170| 69 6e 67 2d 6c 65 73 73 | 70 20 65 6d 61 63 73 2d |ing-less|p emacs-|
|00000180| 76 65 72 73 69 6f 6e 20 | 22 31 39 22 29 29 29 0a |version |"19"))).|
|00000190| 20 20 20 20 28 65 72 72 | 6f 72 20 22 60 2f 67 64 | (err|or "`/gd|
|000001a0| 2f 67 6e 75 2f 65 6d 61 | 63 73 2f 31 39 2e 30 2f |/gnu/ema|cs/19.0/|
|000001b0| 6c 69 73 70 2f 73 2d 72 | 65 67 69 6f 6e 2e 65 6c |lisp/s-r|egion.el|
|000001c0| 27 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |' was co|mpiled f|
|000001d0| 6f 72 20 45 6d 61 63 73 | 20 31 39 22 29 29 0a 0a |or Emacs| 19"))..|
|000001e0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 21 84 |(byte-co|de "..!.|
|000001f0| 0b 00 c2 c3 89 5c 22 11 | c4 09 c5 c6 23 88 c4 09 |.....\".|....#...|
|00000200| c7 c8 23 87 22 20 5b 62 | 6f 75 6e 64 70 20 73 2d |..#." [b|oundp s-|
|00000210| 72 65 67 69 6f 6e 2d 6f | 76 65 72 6c 61 79 20 6d |region-o|verlay m|
|00000220| 61 6b 65 2d 6f 76 65 72 | 6c 61 79 20 31 20 6f 76 |ake-over|lay 1 ov|
|00000230| 65 72 6c 61 79 2d 70 75 | 74 20 66 61 63 65 20 72 |erlay-pu|t face r|
|00000240| 65 67 69 6f 6e 20 70 72 | 69 6f 72 69 74 79 20 31 |egion pr|iority 1|
|00000250| 30 30 30 30 30 30 5d 20 | 34 29 0a 28 64 65 66 61 |000000] |4).(defa|
|00000260| 6c 69 61 73 20 27 73 2d | 72 65 67 69 6f 6e 2d 75 |lias 's-|region-u|
|00000270| 6e 73 68 69 66 74 20 23 | 5b 28 6b 65 79 29 20 22 |nshift #|[(key) "|
|00000280| c0 09 21 83 41 00 09 89 | 47 53 48 89 1a 39 83 3b |..!.A...|GSH..9.;|
|00000290| 00 c3 5c 6e 21 1c c5 c6 | 5c 66 5c 22 89 1e 07 83 |..\n!...|\f\"....|
|000002a0| 33 00 c8 c9 5c 66 ca 0e | 07 4f 5c 66 0e 07 cb 5c |3...\f..|.O\f...\|
|000002b0| 5c cc 4f 50 21 21 82 37 | 00 cd ce 09 5c 22 2a 82 |\.OP!!.7|....\"*.|
|000002c0| 3f 00 cd cf 09 5c 22 29 | 87 cd d0 09 5c 22 87 22 |?....\")|....\"."|
|000002d0| 20 5b 76 65 63 74 6f 72 | 70 20 6b 65 79 20 6c 61 | [vector|p key la|
|000002e0| 73 74 20 73 79 6d 62 6f | 6c 2d 6e 61 6d 65 20 6b |st symbo|l-name k|
|000002f0| 65 79 6e 61 6d 65 20 73 | 74 72 69 6e 67 2d 6d 61 |eyname s|tring-ma|
|00000300| 74 63 68 20 22 53 2d 22 | 20 70 6f 73 20 76 65 63 |tch "S-"| pos vec|
|00000310| 74 6f 72 20 69 6e 74 65 | 72 6e 20 30 20 32 20 6e |tor inte|rn 0 2 n|
|00000320| 69 6c 20 65 72 72 6f 72 | 20 22 4e 6f 6e 2d 73 68 |il error| "Non-sh|
|00000330| 69 66 74 65 64 20 6b 65 | 79 3a 20 25 53 22 20 22 |ifted ke|y: %S" "|
|00000340| 4b 65 79 20 64 6f 65 73 | 20 6e 6f 74 20 65 6e 64 |Key does| not end|
|00000350| 20 69 6e 20 61 20 73 79 | 6d 62 6f 6c 3a 20 25 53 | in a sy|mbol: %S|
|00000360| 22 20 22 4e 6f 6e 2d 76 | 65 63 74 6f 72 20 6b 65 |" "Non-v|ector ke|
|00000370| 79 3a 20 25 53 22 5d 20 | 37 20 22 5c 0a 52 65 6d |y: %S"] |7 "\.Rem|
|00000380| 6f 76 65 20 73 68 69 66 | 74 20 6d 6f 64 69 66 69 |ove shif|t modifi|
|00000390| 65 72 20 66 72 6f 6d 20 | 6c 61 73 74 20 6b 65 79 |er from |last key|
|000003a0| 70 72 65 73 73 20 4b 45 | 59 20 61 6e 64 20 72 65 |press KE|Y and re|
|000003b0| 74 75 72 6e 20 74 68 61 | 74 20 61 73 20 61 20 6b |turn tha|t as a k|
|000003c0| 65 79 2e 22 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |ey."]).(|defalias|
|000003d0| 20 27 73 2d 72 65 67 69 | 6f 6e 2d 6d 6f 76 65 20 | 's-regi|on-move |
|000003e0| 23 5b 28 26 72 65 73 74 | 20 61 72 67 29 20 22 08 |#[(&rest| arg) ".|
|000003f0| 83 0b 00 09 c2 9a 3f 82 | 5c 66 00 c3 83 16 00 c4 |......?.|\f......|
|00000400| c5 21 88 82 1a 00 c6 c7 | 21 88 c8 c9 ca cb 20 21 |.!......|!..... !|
|00000410| 21 0e 5c 66 5c 22 88 cd | 0e 0e cf 20 60 70 24 88 |!.\f\"..|... `p$.|
|00000420| d0 d1 21 88 d2 0e 0e 21 | 87 22 20 5b 6d 61 72 6b |..!....!|." [mark|
|00000430| 2d 61 63 74 69 76 65 20 | 6c 61 73 74 2d 63 6f 6d |-active |last-com|
|00000440| 6d 61 6e 64 20 73 2d 72 | 65 67 69 6f 6e 2d 6d 6f |mand s-r|egion-mo|
|00000450| 76 65 20 74 20 73 65 74 | 2d 6d 61 72 6b 2d 63 6f |ve t set|-mark-co|
|00000460| 6d 6d 61 6e 64 20 6e 69 | 6c 20 6d 65 73 73 61 67 |mmand ni|l messag|
|00000470| 65 20 22 22 20 61 70 70 | 6c 79 20 6b 65 79 2d 62 |e "" app|ly key-b|
|00000480| 69 6e 64 69 6e 67 20 73 | 2d 72 65 67 69 6f 6e 2d |inding s|-region-|
|00000490| 75 6e 73 68 69 66 74 20 | 74 68 69 73 2d 63 6f 6d |unshift |this-com|
|000004a0| 6d 61 6e 64 2d 6b 65 79 | 73 20 61 72 67 20 6d 6f |mand-key|s arg mo|
|000004b0| 76 65 2d 6f 76 65 72 6c | 61 79 20 73 2d 72 65 67 |ve-overl|ay s-reg|
|000004c0| 69 6f 6e 2d 6f 76 65 72 | 6c 61 79 20 6d 61 72 6b |ion-over|lay mark|
|000004d0| 20 73 69 74 2d 66 6f 72 | 20 31 20 64 65 6c 65 74 | sit-for| 1 delet|
|000004e0| 65 2d 6f 76 65 72 6c 61 | 79 5d 20 35 20 22 5c 0a |e-overla|y] 5 "\.|
|000004f0| 54 68 69 73 20 69 73 20 | 61 6e 20 6f 76 65 72 6c |This is |an overl|
|00000500| 61 79 20 66 75 6e 63 74 | 69 6f 6e 20 74 6f 20 70 |ay funct|ion to p|
|00000510| 6f 69 6e 74 2d 6d 6f 76 | 69 6e 67 20 6b 65 79 73 |oint-mov|ing keys|
|00000520| 2e 22 20 22 70 22 5d 29 | 0a 28 64 65 66 61 6c 69 |." "p"])|.(defali|
|00000530| 61 73 20 27 73 2d 72 65 | 67 69 6f 6e 2d 62 69 6e |as 's-re|gion-bin|
|00000540| 64 20 23 5b 28 6b 65 79 | 6c 69 73 74 20 26 6f 70 |d #[(key|list &op|
|00000550| 74 69 6f 6e 61 6c 20 6d | 61 70 29 20 22 08 84 06 |tional m|ap) "...|
|00000560| 00 09 10 5c 6e 85 2c 00 | c3 c4 5c 6e 40 21 21 83 |...\n.,.|..\n@!!.|
|00000570| 24 00 c5 08 c6 c7 c8 c9 | 5c 6e 40 ca 48 21 50 21 |$.......|\n@.H!P!|
|00000580| 21 cb 23 88 5c 6e 41 89 | 12 84 5c 6e 00 cc 87 22 |!.#.\nA.|..\n..."|
|00000590| 20 5b 6d 61 70 20 67 6c | 6f 62 61 6c 2d 6d 61 70 | [map gl|obal-map|
|000005a0| 20 6b 65 79 6c 69 73 74 | 20 63 6f 6d 6d 61 6e 64 | keylist| command|
|000005b0| 70 20 6b 65 79 2d 62 69 | 6e 64 69 6e 67 20 64 65 |p key-bi|nding de|
|000005c0| 66 69 6e 65 2d 6b 65 79 | 20 76 65 63 74 6f 72 20 |fine-key| vector |
|000005d0| 69 6e 74 65 72 6e 20 22 | 53 2d 22 20 73 79 6d 62 |intern "|S-" symb|
|000005e0| 6f 6c 2d 6e 61 6d 65 20 | 30 20 73 2d 72 65 67 69 |ol-name |0 s-regi|
|000005f0| 6f 6e 2d 6d 6f 76 65 20 | 6e 69 6c 5d 20 39 20 22 |on-move |nil] 9 "|
|00000600| 5c 0a 42 69 6e 64 20 6b | 65 79 73 20 69 6e 20 4b |\.Bind k|eys in K|
|00000610| 45 59 4c 49 53 54 20 74 | 6f 20 60 73 2d 72 65 67 |EYLIST t|o `s-reg|
|00000620| 69 6f 6e 2d 6d 6f 76 65 | 27 2e 0a 45 61 63 68 20 |ion-move|'..Each |
|00000630| 6b 65 79 20 69 6e 20 4b | 45 59 4c 49 53 54 20 69 |key in K|EYLIST i|
|00000640| 73 20 62 6f 75 6e 64 20 | 74 6f 20 60 73 2d 72 65 |s bound |to `s-re|
|00000650| 67 69 6f 6e 2d 6d 6f 76 | 65 27 0a 70 72 6f 76 69 |gion-mov|e'.provi|
|00000660| 64 65 64 20 69 74 20 69 | 73 20 61 6c 72 65 61 64 |ded it i|s alread|
|00000670| 79 20 62 6f 75 6e 64 20 | 74 6f 20 73 6f 6d 65 20 |y bound |to some |
|00000680| 63 6f 6d 6d 61 6e 64 20 | 6f 72 20 6f 74 68 65 72 |command |or other|
|00000690| 2e 0a 4f 70 74 69 6f 6e | 61 6c 20 73 65 63 6f 6e |..Option|al secon|
|000006a0| 64 20 61 72 67 75 6d 65 | 6e 74 20 4d 41 50 20 73 |d argume|nt MAP s|
|000006b0| 70 65 63 69 66 69 65 73 | 20 6b 65 79 6d 61 70 20 |pecifies| keymap |
|000006c0| 74 6f 0a 61 64 64 20 62 | 69 6e 64 69 6e 67 20 74 |to.add b|inding t|
|000006d0| 6f 2c 20 64 65 66 61 75 | 6c 74 69 6e 67 20 74 6f |o, defau|lting to|
|000006e0| 20 67 6c 6f 62 61 6c 20 | 6b 65 79 6d 61 70 2e 22 | global |keymap."|
|000006f0| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|00000700| c1 c2 c3 c4 c5 c6 c7 c8 | c9 ca cb cc cd ce cf d0 |........|........|
|00000710| d1 d2 d3 d4 d5 d6 d7 d8 | af 18 21 88 d9 da 21 84 |........|..!...!.|
|00000720| 28 00 db dc dd 5c 22 88 | d9 de 21 84 33 00 db df |(....\".|..!.3...|
|00000730| e0 5c 22 88 d9 e1 21 84 | 3e 00 db e2 e3 5c 22 88 |.\"...!.|>....\".|
|00000740| e4 e5 21 87 22 20 5b 73 | 2d 72 65 67 69 6f 6e 2d |..!." [s|-region-|
|00000750| 62 69 6e 64 20 5b 72 69 | 67 68 74 5d 20 5b 6c 65 |bind [ri|ght] [le|
|00000760| 66 74 5d 20 5b 75 70 5d | 20 5b 64 6f 77 6e 5d 20 |ft] [up]| [down] |
|00000770| 5b 43 2d 6c 65 66 74 5d | 20 5b 43 2d 72 69 67 68 |[C-left]| [C-righ|
|00000780| 74 5d 20 5b 43 2d 75 70 | 5d 20 5b 43 2d 64 6f 77 |t] [C-up|] [C-dow|
|00000790| 6e 5d 20 5b 4d 2d 6c 65 | 66 74 5d 20 5b 4d 2d 72 |n] [M-le|ft] [M-r|
|000007a0| 69 67 68 74 5d 20 5b 4d | 2d 75 70 5d 20 5b 4d 2d |ight] [M|-up] [M-|
|000007b0| 64 6f 77 6e 5d 20 5b 6e | 65 78 74 5d 20 5b 70 72 |down] [n|ext] [pr|
|000007c0| 65 76 69 6f 75 73 5d 20 | 5b 68 6f 6d 65 5d 20 5b |evious] |[home] [|
|000007d0| 65 6e 64 5d 20 5b 43 2d | 6e 65 78 74 5d 20 5b 43 |end] [C-|next] [C|
|000007e0| 2d 70 72 65 76 69 6f 75 | 73 5d 20 5b 43 2d 68 6f |-previou|s] [C-ho|
|000007f0| 6d 65 5d 20 5b 43 2d 65 | 6e 64 5d 20 5b 4d 2d 6e |me] [C-e|nd] [M-n|
|00000800| 65 78 74 5d 20 5b 4d 2d | 70 72 65 76 69 6f 75 73 |ext] [M-|previous|
|00000810| 5d 20 5b 4d 2d 68 6f 6d | 65 5d 20 5b 4d 2d 65 6e |] [M-hom|e] [M-en|
|00000820| 64 5d 20 67 6c 6f 62 61 | 6c 2d 6b 65 79 2d 62 69 |d] globa|l-key-bi|
|00000830| 6e 64 69 6e 67 20 5b 43 | 2d 69 6e 73 65 72 74 5d |nding [C|-insert]|
|00000840| 20 67 6c 6f 62 61 6c 2d | 73 65 74 2d 6b 65 79 20 | global-|set-key |
|00000850| 5b 43 2d 69 6e 73 65 72 | 74 5d 20 63 6f 70 79 2d |[C-inser|t] copy-|
|00000860| 72 65 67 69 6f 6e 2d 61 | 73 2d 6b 69 6c 6c 20 5b |region-a|s-kill [|
|00000870| 43 2d 64 65 6c 65 74 65 | 5d 20 5b 53 2d 64 65 6c |C-delete|] [S-del|
|00000880| 65 74 65 5d 20 6b 69 6c | 6c 2d 72 65 67 69 6f 6e |ete] kil|l-region|
|00000890| 20 5b 53 2d 69 6e 73 65 | 72 74 5d 20 5b 53 2d 69 | [S-inse|rt] [S-i|
|000008a0| 6e 73 65 72 74 5d 20 79 | 61 6e 6b 20 70 72 6f 76 |nsert] y|ank prov|
|000008b0| 69 64 65 20 73 2d 72 65 | 67 69 6f 6e 5d 20 32 35 |ide s-re|gion] 25|
|000008c0| 29 0a | |). | |
+--------+-------------------------+-------------------------+--------+--------+
